home *** CD-ROM | disk | FTP | other *** search
/ Amiga Arena Homepage / Amiga Arena Homepage CD Rom Edition.iso / Programme / Demoversionen / Anwender / WBInfoV3demo / Install.Scalos < prev    next >
Text File  |  1977-12-31  |  3KB  |  112 lines
  1. ; Installer for WBInfo V3 (6.2.2000)
  2. (SET @default-dest "SCALOS:Modules/")
  3. (SET @default-docdir "HELP:")
  4. (SET default_lang 0)
  5.  
  6. ; ***** english texts *****
  7.  
  8. (SET #needKick (CAT "\nWBInfo needs Workbench Version 38 at least." ) )
  9.  
  10. (SET #startMsg (CAT "\nWBInfo 3.0 - the ultimate information replacement !\n\n"
  11.                      "This script installs WBInfo on your AMIGA.\n\n") )
  12.  
  13. (SET #destPrompt (CAT "Please choose the destination directory for WBInfo.\n" ) )
  14.  
  15. (SET #copyPFiles (CAT "Copying program files") )
  16.  
  17. (SET #langPrompt (CAT "Select the languages you wish to use with WBInfo.") )
  18.  
  19. (SET #DocPrompt (CAT "Select the directory for the documentation file.") )
  20.  
  21. (SET #exitMsg (CAT "WBInfo installation succeeded\nYou should reboot now.") )
  22.  
  23. ; ***** german texts *****
  24.  
  25. (IF (= @language "deutsch")
  26. (
  27. (SET default_lang 1)
  28.  
  29. (SET #needKick (CAT "\nWBInfo benötigt mindestens die Workbench-Version 38." ) )
  30.  
  31. (SET #startMsg (CAT "\n\WBInfo 3.0 - der ultimative informations ersatz !\n\n"
  32.                      "Diese Datei installiert WBInfo auf ihrem AMIGA.\n\n") )
  33.  
  34. (SET #destPrompt (CAT "Wählen Sie bitte das Zielverzeichnis für WBInfo.\n") )
  35.  
  36. (SET #copyPFiles (CAT "Kopiere Programmdateien") )
  37.  
  38. (SET #langPrompt (CAT "Wählen Sie die Sprachen, die Sie mit WBInfo benutzen wollen.") )
  39.  
  40. (SET #DocPrompt (CAT "Wählen Sie ein Verzeichnis, in welches die Dokumentation kopiert werden soll.") )
  41.  
  42. (SET #exitMsg (CAT "WBInfo wurde erfolgreich installiert!\n Sie sollten nun das System neustarten.") )
  43. )
  44. )
  45.  
  46. ; ***** start installation *****
  47.  
  48. (if (< (/ (GETVERSION) 65536) 38)
  49.     (ABORT #needKick)
  50. )
  51.  
  52. (MESSAGE #startMsg)
  53.  
  54. ; ***** get dest dir for WBInfo *****
  55.  
  56. (SET @default-dest
  57.     (ASKDIR (PROMPT  #destPrompt)
  58.             (HELP    askdir-help)
  59.             (DEFAULT @default-dest )))
  60.  
  61. (COPYFILES (SOURCE "Scalos/Information.module")
  62.            (DEST @default-dest )
  63.            (NEWNAME "Information.module")
  64.            (HELP copyfiles-help)
  65.            (INFOS)
  66.            (NOPOSITION)
  67. )
  68.  
  69. ; ***** install some languages *****
  70.  
  71. (SET sprachen (ASKOPTIONS (PROMPT #langPrompt)
  72.                           (HELP   askoptions-help)
  73.                           (CHOICES "english"
  74.                                    "deutsch"
  75.                           )
  76.                           (DEFAULT (+ default_lang 0) )
  77.               )
  78. )
  79.  
  80. (if (IN sprachen 1)
  81.     (COPYFILES (SOURCE "catalogs/deutsch/WBInfo3.catalog")
  82.                (DEST "Locale:Catalogs/deutsch") )
  83. )
  84. ; ***** get dest for doc files *****
  85.  
  86. (SET @DocDir
  87.     (ASKDIR (PROMPT  #DocPrompt)
  88.             (HELP    askdir-help)
  89.             (DEFAULT @default-docdir)
  90.             (NEWPATH)
  91.     )
  92. )
  93.  
  94. ; ***** install doc files *****
  95.  
  96. (if (IN sprachen 0)
  97.   (SET SDocDir  "docs/english")
  98. )
  99.   
  100. (if (IN sprachen 1)
  101.   (SET SDocDir "docs/deutsch")
  102. )  
  103.  
  104. (COPYFILES (SOURCE  SDocDir)
  105.            (DEST    @DocDir)
  106.            (CHOICES "WBInfo.guide")
  107.            (INFOS)
  108.            (NOPOSITION)
  109. )
  110.  
  111. (EXIT #exitMsg)
  112.